home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Network Support Library
/
RoseWare - Network Support Library.iso
/
apidev
/
tpapi.exe
/
NWMESS.PA1
< prev
next >
Wrap
Text File
|
1994-01-14
|
4KB
|
83 lines
{#Z+}
{(10U&l12D(s4099T&k2S*}
{***************************************************************************}
{** Program : NWMESS **}
{***************************************************************************}
{** Version : 1.4 ** Started : 11/11/91 ** Ended : / / **}
{***************************************************************************}
{******************************** Description ******************************}
{***************************************************************************}
{** OOP library for Netware API **}
{** **}
{** This unit forms the second level object : MESSAGE **}
{** This object is a descandent of : NETWARE **}
{** **}
{** **}
{** **}
{** **}
{***************************************************************************}
{******************************** Information ******************************}
{***************************************************************************}
{** Provides Netware Messaging Services **}
{** **}
{** **}
{** **}
{** This code is (c) 1991 - 1994 Antonio Covelli. ALL RIGHTS RESERVED. **}
{** Portions (c) Novell Inc, **}
{** **}
{** **}
{***************************************************************************}
{$I NETWARE.INC}
{#Z-}
UNIT NWMESS;
INTERFACE
USES
nwvar,
netware;
TYPE
PMessageOBJ = ^MessageOBJ;
MessageOBJ = OBJECT (NetwareOBJ)
FUNCTION BroadcastToConsole (Message : TConsoleMessage) : WORD;
FUNCTION CheckPipeStatus (ConnectionList : TConnectionList; VAR ResultList : TConnectionList;
VAR ConnectionCount : BYTE) : WORD;
FUNCTION CloseMessagePipe (ConnectionList : TConnectionList; VAR ResultList : TConnectionList;
VAR ConnectionCount : BYTE) : WORD;
FUNCTION DisableBroadcasts : WORD;
FUNCTION EnableBroadcasts : WORD;
FUNCTION GetBroadcastMessage (VAR Message : TBroadcastMessage) : WORD;
FUNCTION GetBroadcastMode : WORD;
FUNCTION GetPersonalMessage (VAR Message : TPersonalMessage; VAR SourceConnection : WORD) : WORD;
FUNCTION LogNetworkMessage (Message : TConsoleMessage) : WORD;
FUNCTION OpenMessagePipe (ConnectionList : TConnectionList; VAR ResultList : TConnectionList;
VAR ConnectionCount : BYTE) : WORD;
FUNCTION SendBroadcastMessage (Message : TBroadcastMessage; ConnectionList : TConnectionList;
VAR ResultList : TConnectionList; ConnectionCount : BYTE) : WORD;
FUNCTION SendPersonalMessage (Message : TPersonalMessage; ConnectionList : TConnectionList;
VAR ResultList : TConnectionList; ConnectionCount : BYTE) : WORD;
PROCEDURE SetBroadcastMode (BroadcastMode : WORD);
DESTRUCTOR Done; VIRTUAL;
END;